home *** CD-ROM | disk | FTP | other *** search
- property sd, spriteNum, s1, s2
-
- on beginSprite me
- sd = sprite(spriteNum)
- sd.visible = 1
- sd.blend = 0
- sprite(s1).blend = 0
- sprite(s2).blend = 0
- end
-
- on mouseUp me
- go("help")
- end
-
- on mouseEnter me
- sd.blend = 100
- sprite(s1).blend = 100
- sprite(s2).blend = 100
- end
-
- on mouseLeave me
- sd.blend = 0
- sprite(s1).blend = 0
- sprite(s2).blend = 0
- end
-
- on getPropertyDescriptionList
- vPDList = [:]
- setaProp(vPDList, #s1, [#comment: "left sprite:", #format: #integer, #default: 1])
- setaProp(vPDList, #s2, [#comment: "right sprite:", #format: #integer, #default: 2])
- return vPDList
- end
-